home *** CD-ROM | disk | FTP | other *** search
/ GFX Sensations 1 / Graphic Sensations - Volume 1.iso / tools / amiga / 3d_tools / irit40s.lha / Irit / cagd_lib / cagd_dbg.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-12-30  |  1.2 KB  |  40 lines
  1. /******************************************************************************
  2. * Cagd_dbg.c - Provide a routine to print Surface/Curve objects to stderr.    *
  3. *******************************************************************************
  4. * Written by Gershon Elber, Sep. 91.                          *
  5. ******************************************************************************/
  6.  
  7. #include "cagd_loc.h"
  8.  
  9. /******************************************************************************
  10. * Prints curves and surfaces to stderr.                          *
  11. ******************************************************************************/
  12. void CagdDbg(void *Obj)
  13. {
  14.     char *ErrorMsg;
  15.     CagdCrvStruct
  16.     *Crv = (CagdCrvStruct *) Obj;
  17.     CagdSrfStruct
  18.     *Srf = (CagdSrfStruct *) Obj;
  19.     CagdGeomType 
  20.     GType = Crv -> GType;
  21.  
  22.     switch (GType) {
  23.     case CAGD_CBEZIER_TYPE:
  24.     case CAGD_CBSPLINE_TYPE:
  25.     case CAGD_CPOWER_TYPE:
  26.         CagdCrvWriteToFile2(Crv, stderr, 0, "CagdDbg", &ErrorMsg);
  27.         break;
  28.     case CAGD_SBEZIER_TYPE:
  29.     case CAGD_SBSPLINE_TYPE:
  30.     case CAGD_SPOWER_TYPE:
  31.         CagdSrfWriteToFile2(Srf, stderr, 0, "CagdDbg", &ErrorMsg);
  32.         break;
  33.     case CAGD_UNDEF_TYPE:
  34.         break;
  35.     }
  36.  
  37.     if (ErrorMsg)
  38.     fprintf(stderr, "CagdDbg Error: %s\n", ErrorMsg);
  39. }
  40.